y=c(1,2,3,4,5)
y
fred=c(6,7,8,9,10)
fred
colors=c('yellow','red','orange','blue','purple')
colors

# This is a comment
# rnorm will randomly generate values from a normal distribution
# rnorm(n,mean,sd)
# I just arbitrarely chose the values 
# mine is getting 100 values with mean 5 and std dev 1.3

x=rnorm(100,5,1.3) 

# graphing
hist(x)
# vertical boxplot
boxplot(x)
# horizontal boxplot
boxplot(x,horizontal = T)

# This is a comment
# summary statistics separately

mean(x)
var(x)
sd(x)
median(x)
length(x)
min(x)
max(x)

# summary statistics: 5# summary + mean

summary(x)